perm filename RDRM[LK,LCS] blob sn#159125 filedate 1975-05-16 generic text, type T, neo UTF8
00100	 SRATE←20000;MAG←512/SRATE;RCDFLG←-1;                                       
00150	REVINIT←1;R←0;
00200	 
00300	  < ZDRM .DAT  --  RANDOM NUMBER=     3
00400	 PLAY;REV 0 20.5;REVINIT=0;
05300	 FM       0.000    0.283  129.008 1000.000 F12   F11      0.000    6.692   82.007 F3   
05400	       F11      0.337
05500	;PRINT(P1);< FM      1
05600	 FM       0.283    0.272  176.246 1000.000 F12   F11      0.000    5.052  120.099 F3   
05700	       F11      0.515
05800	;PRINT(P1);< FM      2
05900	 FM       0.555    0.132  124.211 1000.000 F12   F11      0.000    7.168   84.641 F3   
06000	       F11  
06100	;PRINT(P1);< FM      3
06200	 FM       0.687    0.292  184.646 1000.000 F12   F11      0.000    4.822  125.823 F3   
06300	       F11  
06400	;PRINT(P1);< FM      4
06500	 FM       0.979    0.294  185.303 1000.000 F12   F11      0.000    4.805  126.271 F3   
06600	       F11  
06700	;PRINT(P1);< FM      5
06800	 FM       1.273    0.142  176.586 1000.000 F12   F11      0.000    5.042  120.331 F3   
06900	       F11  
07000	;PRINT(P1);< FM      6
07100	 FM2      1.415    0.250   78.372 1000.000 F12   F11      0.000   11.361   53.405 F3   
07200	       F11  
07300	;PRINT(P1);< FM2     7
07400	 FM       1.721    0.316  185.070 1000.000 F12   F11      0.000    4.811  126.112 F3   
07500	       F11  
07600	;PRINT(P1);< FM      8
07700	 FM2      2.037    0.250  207.842 1000.000 F12   F11      0.000    4.284  141.630 F3   
07800	       F11  
07900	;PRINT(P1);< FM2     9
08000	 FM       2.344    0.283  184.213 1000.000 F12   F11      0.000    4.834  125.528 F3   
08100	       F11  
08200	;PRINT(P1);< FM     10
08300	 FM2      2.627    0.250  253.690 1000.000 F12   F11      0.000    3.510  172.872 F3   
08400	       F11  
08500	;PRINT(P1);< FM2    11
08600	 FM       2.874    0.203  124.380 1000.000 F12   F11      0.000    7.159   84.756 F3   
08700	       F11  
08800	;PRINT(P1);< FM     12
08900	 FM       3.077    0.182  123.824 1000.000 F12   F11      0.000    7.191   84.377 F3   
09000	       F11  
09100	;PRINT(P1);< FM     13
09200	 FM       3.259    0.258  125.332 1000.000 F12   F11      0.000    7.104   85.405 F3   
09300	       F11  
09400	;PRINT(P1);< FM     14
09500	 FM       4.617    0.107  128.387 1000.000 F12   F11      0.000    6.662   81.746 F3   
09600	       F11      0.374
09700	;PRINT(P1);< FM     16
09800	 FM2      4.724    0.250   71.621 1000.000 F12   F11      0.000   11.942   45.602 F3   
09900	       F11  
10000	;PRINT(P1);< FM2    17
10100	 FM       4.911    0.099  129.818 1000.000 F12   F11      0.000    6.589   82.657 F3   
10200	       F11  
10300	;PRINT(P1);< FM     18
10400	 FM       5.010    0.104  175.069 1000.000 F12   F11      0.000    4.886  111.469 F3   
10500	       F11  
10600	;PRINT(P1);< FM     19
10700	 FM       5.114    0.400  123.269 1000.000 F12   F11      0.000    6.939   78.487 F3   
10800	       F11  
10900	;PRINT(P1);< FM     20
11000	 FM       5.678    0.208  123.161 1000.000 F12   F11      0.000    6.945   78.418 F3   
11100	       F11  
11200	;PRINT(P1);< FM     21
11300	 FM       5.886    0.236  127.284 1000.000 F12   F11      0.000    6.720   81.043 F3   
11400	       F11  
11500	;PRINT(P1);< FM     22
11600	 FM       6.122    0.314  129.188 1000.000 F12   F11      0.000    6.621   82.255 F3   
11700	       F11  
11800	;PRINT(P1);< FM     23
11900	 FM       6.436    0.135  126.537 1000.000 F12   F11      0.000    6.760   80.568 F3   
12000	       F11  
12100	;PRINT(P1);< FM     24
12200	 FM       6.571    0.400  183.298 1000.000 F12   F11      0.000    4.666  116.708 F3   
12300	       F11  
12400	;PRINT(P1);< FM     25
12500	 FM       7.435    0.400  184.786 1000.000 F12   F11      0.000    4.629  117.656 F3   
12600	       F11  
12700	;PRINT(P1);< FM     26
12800	 FM2      7.973    0.250  221.600 1000.000 F12   F11      0.000    3.860  141.096 F3   
12900	       F11  
13000	;PRINT(P1);< FM2    27
13100	 FM       8.113    0.139  182.803 1000.000 F12   F11      0.000    4.679  116.393 F3   
13200	       F11  
13300	;PRINT(P1);< FM     28
13400	 FM       8.252    0.255  127.058 1000.000 F12   F11      0.000    6.732   80.899 F3   
13500	       F11  
13600	;PRINT(P1);< FM     29
13700	 FM2      9.257    0.250   79.621 1000.000 F12   F11      0.000   11.124   51.714 F3   
13800	       F11      0.136
13900	;PRINT(P1);< FM2    31
14000	 FM       9.534    0.287  129.036 1000.000 F12   F11      0.000    6.864   83.809 F3   
14100	       F11  
14200	;PRINT(P1);< FM     32
14300	 FM       9.821    0.270  184.791 1000.000 F12   F11      0.000    4.793  120.022 F3   
14400	       F11  
14500	;PRINT(P1);< FM     33
14600	 FM      10.091    0.239  185.526 1000.000 F12   F11      0.000    4.774  120.499 F3   
14700	       F11  
14800	;PRINT(P1);< FM     34
14900	 FM2     10.330    0.250  207.313 1000.000 F12   F11      0.000    4.272  134.650 F3   
15000	       F11  
15100	;PRINT(P1);< FM2    35
15200	 FM      10.633    0.400  181.840 1000.000 F12   F11      0.000    4.871  118.105 F3   
15300	       F11  
15400	;PRINT(P1);< FM     36
15500	 FM2     11.140    0.250   75.907 1000.000 F12   F11      0.000   11.669   49.302 F3   
15600	       F11  
15700	;PRINT(P1);< FM2    37
15800	 FM      11.490    0.310  176.343 1000.000 F12   F11      0.000    5.023  114.534 F3   
15900	       F11  
16000	;PRINT(P1);< FM     38
16100	 FM      11.800    0.207  126.955 1000.000 F12   F11      0.000    6.977   82.457 F3   
16200	       F11  
16300	;PRINT(P1);< FM     39
16400	 FM      12.007    0.211  185.852 1000.000 F12   F11      0.000    4.766  120.711 F3   
16500	       F11  
16600	;PRINT(P1);< FM     40
16700	 FM      12.218    0.217  183.222 1000.000 F12   F11      0.000    4.834  119.002 F3   
16800	       F11  
16900	;PRINT(P1);< FM     41
17000	 FM      12.435    0.144  123.137 1000.000 F12   F11      0.000    7.193   79.977 F3   
17100	       F11  
17200	;PRINT(P1);< FM     42
17300	 FM      12.579    0.156  129.439 1000.000 F12   F11      0.000    6.843   84.071 F3   
17400	       F11  
17500	;PRINT(P1);< FM     43
17600	 FM      12.735    0.140  126.512 1000.000 F12   F11      0.000    7.001   82.170 F3   
17700	       F11  
17800	;PRINT(P1);< FM     44
17900	 FM      12.875    0.349  181.369 1000.000 F12   F11      0.000    4.884  117.799 F3   
18000	       F11  
18100	;PRINT(P1);< FM     45
18200	 FM      13.224    0.400  182.155 1000.000 F12   F11      0.000    4.863  118.310 F3   
18300	       F11  
18400	;PRINT(P1);< FM     46
18500	 FM2     13.741    0.250  256.089 1000.000 F12   F11      0.000    3.459  166.329 F3   
18600	       F11  
18700	;PRINT(P1);< FM2    47
18800	 FM      14.226    0.161  122.345 1000.000 F12   F11      0.000    7.240   79.463 F3   
18900	       F11  
19000	;PRINT(P1);< FM     48
19100	 FM2     14.387    0.250  218.067 1000.000 F12   F11      0.000    4.062  141.634 F3   
19200	       F11  
19300	;PRINT(P1);< FM2    49
19400	 FM      15.734    0.161  184.571 1000.000 F12   F11      0.000    4.659  126.767 F3   
19500	       F11      0.665
19600	;PRINT(P1);< FM     51
19700	 FM      15.895    0.400  178.344 1000.000 F12   F11      0.000    4.821  122.490 F3   
19800	       F11  
19900	;PRINT(P1);< FM     52
20000	 FM      16.445    0.118  125.333 1000.000 F12   F11      0.000    6.860   86.081 F3   
20100	       F11  
20200	;PRINT(P1);< FM     53
20300	 FM      16.563    0.158  124.240 1000.000 F12   F11      0.000    6.921   85.330 F3   
20400	       F11  
20500	;PRINT(P1);< FM     54
20600	 FM      16.721    0.400  183.163 1000.000 F12   F11      0.000    4.694  125.800 F3   
20700	       F11  
20800	;PRINT(P1);< FM     55
20900	 FM2     17.311    0.249   72.208 1000.000 F12   F11      0.000   11.908   49.594 F3   
21000	       F11  
21100	;PRINT(P1);< FM2    56
21200	 FM      17.434    0.164  180.030 1000.000 F12   F11      0.000    4.776  123.648 F3   
21300	       F11  
21400	;PRINT(P1);< FM     57
21500	 FM      17.598    0.400  184.484 1000.000 F12   F11      0.000    4.661  126.707 F3   
21600	       F11  
21700	;PRINT(P1);< FM     58
21800	 FM2     18.179    0.252  208.712 1000.000 F12   F11      0.000    4.120  143.347 F3   
21900	       F11  
22000	;PRINT(P1);< FM2    59
22100	 FM      18.272    0.091  180.498 1000.000 F12   F11      0.000    4.764  123.969 F3   
22200	       F11  
22300	;PRINT(P1);< FM     60
22400	 FM      18.363    0.199  185.958 1000.000 F12   F11      0.000    4.624  127.719 F3   
22500	       F11  
22600	;PRINT(P1);< FM     61
22700	 FM      18.562    0.089  179.276 1000.000 F12   F11      0.000    4.796  123.130 F3   
22800	       F11  
22900	;PRINT(P1);< FM     62
23000	 FM      18.651    0.363  177.562 1000.000 F12   F11      0.000    4.842  121.953 F3   
23100	       F11  
23200	;PRINT(P1);< FM     63
23300	 FINISH; < ZDRM .DAT